home *** CD-ROM | disk | FTP | other *** search
/ PCMania 40 / PCMania CD40_1.iso / render40 / oca_a / pupitre.inc < prev    next >
Text File  |  1995-10-08  |  1KB  |  51 lines
  1. #include "mesa.inc"
  2. #include "texturas.inc"
  3.  
  4. #declare BOUND_SILLA = box {
  5.    <-1.0, -1.0, -1.0>, <1.0, 1.0, 1.0>
  6.   no_shadow
  7.   scale <4.50, 4.5, 3.50>
  8. }
  9.  
  10. #declare RESPALDO = box {
  11.   <-1, -1, -1>, <1, 1, 1>
  12.   texture {
  13.     Mesa_Silla
  14.   }
  15.   scale <1.700, 0.10, 0.70>
  16.   rotate <10.00, 0.00, 0.00>
  17.   translate <-0.2, -2.5, 3.4>
  18. }
  19.  
  20. #declare SUJETARES1 = cylinder {
  21.   <0,0,1>, <0,0,0>, 1
  22.   texture {
  23.     Verde_silla
  24.   }
  25.   scale <0.25, 0.250, 2.500>
  26.   rotate <10.0, 0.0, 0.0>
  27.   translate <-1.7, -2.30, 0.665539>
  28. }
  29.  
  30. #declare SUJETARES2 = cylinder {
  31.   <0,0,1>, <0,0,0>, 1
  32.   texture {
  33.     Verde_silla
  34.   }
  35.   scale <0.25, 0.25, 2.5>
  36.   rotate <10.0, 0.00, 0.0>
  37.   translate <1.10, -2.30, 0.751132>
  38. }
  39. #declare PUPITRE =union{
  40.   object{ MESA scale <0.80, 0.80, 2.15> translate <0.0, 0.0, 0.50000>}
  41.   object{ MESA2 scale <0.10, 0.5, 0.10> rotate <0.0, 0.0, -90.0>}
  42. union {//SILLA
  43.   object { MESA2 }
  44.   object { RESPALDO  }
  45.   object { SUJETARES1 }
  46.   object { SUJETARES2 }
  47.   bounded_by { BOUND_SILLA }
  48.   translate <0.00, -2.50, -0.20>
  49.   scale <0.55, 0.55, 1.3>}
  50. }
  51.